home *** CD-ROM | disk | FTP | other *** search
/ Mac100% 1999 April / MAC100-1999-04.ISO.7z / MAC100-1999-04.ISO / ｵﾝﾗｲﾝｿﾌﾄ定点観測 / Graphics / X-TRACE67.lzh / XTRACE R67 / X-TRACE / X-TRACE.rsrc / TEXT_703_dxfx.xt3.txt < prev    next >
Text File  |  1999-01-31  |  1KB  |  65 lines
  1. xtrace    "DXFX; DXF data direct import script"
  2. {
  3.     pragma    smooth_with_bound=off;
  4.  
  5.     // determin reflection and high-light parameter
  6.     nvar    dxfx.refl_rate=1;        // in percent(%)
  7.     nvar    dxfx.nrefl=8;
  8.     var        dxfx.rr.refl,dxfx.rr.high,dxfx.rr.beta;
  9.     dxfx.rr.refl=dxfx.refl_rate/100;
  10.     if (dxfx.refl_rate=0)
  11.     {
  12.         dxfx.nrefl=0;
  13.         dxfx.rr.high=0;
  14.         dxfx.rr.beta=0;
  15.     }
  16.     elif (dxfx.refl_rate=1)
  17.     {
  18.         dxfx.nrefl=0;
  19.         dxfx.rr.high=80;
  20.         dxfx.rr.beta=0.20;
  21.     }
  22.     else
  23.     {
  24.         dxfx.rr.high=1;
  25.         dxfx.rr.beta=0.2;
  26.     }
  27.  
  28.     nvar    dxfx.vsmooth=120;
  29.     smooth    dxfx.vsmooth : model
  30.     {
  31.         nvar    dxfx.cr=1.000, dxfx.cg=0.000, dxfx.cb=0.000;
  32.         attr    dxfx_atr=
  33.         {
  34.             color    dxfx.cr,dxfx.cg,dxfx.cb;
  35.             diff    1 - dxfx.rr.refl,0.000;
  36.             refl    dxfx.rr.refl,dxfx.rr.high,dxfx.rr.beta;
  37.         };
  38.  
  39.         nmacro    dxfx.file_name="dxfx.dxf";
  40.         dxf        $(dxfx.file_name) =
  41.         {
  42.             dxf_silent    on;
  43.         };
  44.     }
  45.  
  46.     nvar    dxfx.nshdw=0, dxfx.distr=0;
  47.     cond    0,1, dxfx.nrefl,dxfx.nshdw,dxfx.distr;
  48.  
  49.     screen    fwid,fwid,fbit;
  50.  
  51.     nvar    dxfx.ar=0.3,dxfx.ag=0.3,dxfx.ab=0.3;
  52.     ambi    1, dxfx.ar,dxfx.ag,dxfx.ab, 0.2, 0,0;
  53.  
  54.     nvar    dxfx.vx=0, dxfx.vy=1, dxfx.vz=0;
  55.     nvar    dxfx.wx=1, dxfx.wy=1, dxfx.wz=1;
  56.     nvar    dxfx.lx=dxfx.wx, dxfx.ly=dxfx.wy, dxfx.lz=dxfx.wz;
  57.     model
  58.     {
  59.         levery    dxfx.vx,dxfx.vy,dxfx.vz;
  60.         viewpoly    30, 0,1,0, dxfx.wx,dxfx.wy,dxfx.wz;
  61.         screw    dxfx.vx,dxfx.vy,dxfx.vz, -45;
  62.         inf        dxfx.lx,dxfx.ly,dxfx.lz, 0.267, 0.800,0.800,0.800;
  63.     }
  64. }
  65.